home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Basic / Visual Basic.60 / COMMON / TOOLS / VCM / VCM.MDB / VcmComponentContainer / 22_Cabinet / RandomAd.asp < prev    next >
Encoding:
Text File  |  1998-05-18  |  350 b   |  20 lines
  1. <%@ LANGUAGE="VBSCRIPT" %>
  2.  
  3. <html>
  4. <head>
  5.  
  6. </head>
  7. <body bgcolor="#FFFFFF" LINK="#500000" VLINK="#505050">
  8.  
  9. <%Set ad = Server.CreateObject("MSWC.AdRotator")%>
  10.  
  11. <%= ad.GetAdvertisement("RandomAd.txt") %>  
  12. <br><br>
  13. <font SIZE="2">
  14. <a HREF="javascript:location.href='RandomAd.asp'">Refresh Page</a>
  15. <br><br>
  16. </font>
  17.  
  18. </body>
  19. </html>
  20.